From: Juri Linkov <juri@jurta.org>
Date: Sat, 25 Aug 2007 14:08:44 +0000 (+0000)
Subject: Add autoloads to put associations in auto-mode-alist:
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~16958
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=874d4cfd1594144432c953a5e3071e01762ebca1;p=emacs.git

Add autoloads to put associations in auto-mode-alist:
associate "\\.x[bp]m\\'" with c-mode and image-mode-maybe, and
"\\.svgz?\\'" with xml-mode and image-mode-maybe.
---

diff --git a/lisp/image-mode.el b/lisp/image-mode.el
index 3b95bf20cc8..cf977c01dee 100644
--- a/lisp/image-mode.el
+++ b/lisp/image-mode.el
@@ -41,8 +41,13 @@
 ;;;###autoload (push '("\\.gif\\'"      . image-mode) auto-mode-alist)
 ;;;###autoload (push '("\\.tiff?\\'"    . image-mode) auto-mode-alist)
 ;;;###autoload (push '("\\.p[bpgn]m\\'" . image-mode) auto-mode-alist)
+
+;;;###autoload (push '("\\.x[bp]m\\'"   . c-mode)     auto-mode-alist)
 ;;;###autoload (push '("\\.x[bp]m\\'"   . image-mode-maybe) auto-mode-alist)
 
+;;;###autoload (push '("\\.svgz?\\'"    . xml-mode)   auto-mode-alist)
+;;;###autoload (push '("\\.svgz?\\'"    . image-mode-maybe) auto-mode-alist)
+
 ;;; Image scrolling functions
 
 (defun image-forward-hscroll (&optional n)